home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EuroCD 3
/
EuroCD 3.iso
/
Programming
/
SecalDemo
/
Inc
/
libcalls
/
colorwheel.inc
< prev
next >
Wrap
Text File
|
1998-06-24
|
314b
|
15 lines
pattern ConvertHSBToRGB(_hsb,_rgb) is
push a6;
safe a0:=_hsb; a1:=_rgb;;
a6:=ColorWheelBase; jsr [a6-30];
pop a6;
endp; # CONVERTHSBTORGB
pattern ConvertRGBToHSB(_rgb,_hsb) is
push a6;
safe a0:=_rgb; a1:=_hsb;;
a6:=ColorWheelBase; jsr [a6-36];
pop a6;
endp; # CONVERTRGBTOHSB